;;;QQ:67762207
[@Area4_Map1]
{



#IF
checkhum DQ101_001 1
#ACT
goto @ELseMap1_STEP1
break

#IF
#ACT
savevalue "QuestDiary\AreaQuest\ChoBoGuide4\Humrecord.txt" [] [׶1] %A0

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 11
checkitem ǵ 1

#ACT
MonClear DQ101_001
GOTO @BichunMap1_STEP3
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 12
#ACT
MonClear DQ101_001
GOTO @BichunMap1_STEP4
BREAK

#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@BichunArea4_Next]

[@BichunArea4_Next()]
#IF
#ACT
mov A0 %ARG(1)
mov D0 %ARG(2)
mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 12
#ACT
MonClear DQ101_001
GOTO @BichunMap1_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 11
checkitem ǵ 1
#ACT
MonClear DQ101_001
GOTO @BichunMap1_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 2
#ACT
GOTO @BichunMap1_STEP1
BREAK

#IF
Equal A0 %USERNAME
#SAY
(һɲ֪ƿˡ)\\
<  /@exit>
#ACT
BREAK

[@BichunMap1_STEP1]
#IF
#ACT
Enter_Fail
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=3"
#SAY
(һɲ֪ƿˡǱǹ˵Ŀɵĵطسǹɡ)\\
<  /@exit>

[@BichunMap1_STEP2]
#IF
#SAY
(ƺΣգȥһҪСİ)\\
<  /@exit>

[@BichunMap1_STEP3]
#IF
#ACT
Enter_ok
take ǵ 1
MongenP "DQ101_001,24,24,5" ʿ 1
MongenP "DQ101_001,24,24,5"  10
MongenP "DQ101_001,25,25,5" սʿ 10
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=12"

[@BichunMap1_STEP4]
#IF
#ACT
Enter_ok
MongenP "DQ101_001,24,24,5" ʿ 1
MongenP "DQ101_001,24,24,5"  10
MongenP "DQ101_001,25,25,5" սʿ 10

[@ELseMap1_STEP1]
#IF
#ACT
loadvalue A1 "QuestDiary\AreaQuest\ChoBoGuide4\Humrecord.txt" [] [׶1]
Enter_Fail
#SAY
(ǲܽȥΪһ<$OUTPUT(A1)>棬Ҫٵһ...)\\
<  /@exit>

}

[@Area4_Map2]
{



#IF
checkhum DQ102_001 1
#ACT
goto @ELseMap2_STEP1
break

#IF
#ACT
savevalue "QuestDiary\AreaQuest\ChoBoGuide4\Humrecord.txt" [] [׶2] %A0

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 14
checkitem 鲻 1

#ACT
MonClear DQ102_001
GOTO @hagulMap2_STEP3
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 15
#ACT
MonClear DQ101_001
GOTO @hagulMap2_STEP4
BREAK

#IF
#ACT
FormatStr "FLD_CHAR='%s'" %USERNAME
ReadValueSql "TBL_BasicCharQuest" %A9 "FLD_CHAR,FLD_STATUS1,FLD_STATUS1_RDY,FLD_MAKEIDX" [@hagulMap2_Next]

[@hagulMap2_Next()]
#IF
#ACT
mov A0 %ARG(1)
mov D0 %ARG(2)
mov D1 %ARG(3)

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 15
#ACT
MonClear DQ102_001
GOTO @BichunMap1_STEP2
BREAK

#IF
Equal A0 %USERNAME
Equal D0 20
Equal D1 14
checkitem 鲻 1
#ACT
MonClear DQ102_001
GOTO @BichunMap1_STEP2
BREAK

#IF
Equal A0 %USERNAME
#SAY
(һɲ֪ƿˡ)\\
<  /@exit>
#ACT
BREAK

[@BichunMap1_STEP2]
#IF
#SAY
(ƺΣգȥһҪСİ)\\
<  /@exit>

[@hagulMap2_STEP3]
#IF
#ACT
Enter_ok
take 鲻 1
MongenP "DQ102_001,24,27,5" þ 1
MongenP "DQ102_001,24,27,5"  10
MongenP "DQ102_001,24,27,5" սʿ 10
FormatStr "FLD_CHAR='%s'" %USERNAME
UpdateValueSql "TBL_BasicCharQuest" %A9 "FLD_STATUS1_RDY=15"

[@hagulMap2_STEP4]
#IF
#ACT
Enter_ok
MongenP "DQ102_001,24,27,5" þ 1
MongenP "DQ102_001,24,27,5"  10
MongenP "DQ102_001,24,27,5" սʿ 10

[@ELseMap2_STEP1]
#IF
#ACT
loadvalue A1 "QuestDiary\AreaQuest\ChoBoGuide4\Humrecord.txt" [] [׶2]
Enter_Fail
#SAY
(ǽȥ,Ϊһ<$OUTPUT(A1)>...Եһٽȥɡ)\\
<  /@exit>

}
;;;QQ:67762207
